00100	********  DISPLAYS MUSIC AND DRAWS IT ON THE PLOTTER *******
00200	
00300	TO RUN: SEE FILE "CMD[1,LCS]" FOR 'DO' FILES.
00400			(BEST IS TO 'DO BIGMSS.DO' WHILE ALIASED TO [MSS,LCS].
00500			FOR THE PROGRAM TO RUN IT MUST PICK UP SOME SPECIAL
00600			DATA IN THAT AREA.)
00700	
00800	******* KEY TO THE PARAMETER NUMBERS *******
00900	
01000		SEE SECTION ON 'SCORE' INPUT FOR FIRST STEPS IN INPUT.
01100		THE FOLLOWING CODE NUMBERS ARE USED MAINLY FOR EDITING.
01200	
01300	--------  SECTION I  ---------
01400	
01500	1 NOTES: 1, POS, STF, NT NUM, 
01600		(P5) STEM DIR & ACCI,
01700		(P6) FILLED IN? (≥0), DECIS REFER TO ACCENTS, ETC.
01800		(P7)NUM OF TAILS(0,1=8TH,4=64TH, ETC.)
01900				(IF 2 DIGITS, LFT IS NUM OF DOTS.)
02000		(P8)STEM EXT. BY NT NUM,
02100		(P9)=1 TO SUPPRESS LEDGER LINES.
02200		(P10)=1 PUTS SLASH ON GRACE-NOTE TAIL (.01 IN P7=SAME)
02300	    P4 100S GIVE MINIS, 200S GIVE DIAMOND SHAPE (HARMONICS)
02400				300S GIVE 'X' NOTES (FOR PERCUSSION, ETC.)
02500	    FOR P5: <10= NO STEM, 10-13=STEM UP, 20-23= STEM DOWN
02600		1,11 OR 21=FLAT; 2,12,22=#; 3,13,23=NATURAL
02700	    FOR P6: POS NUM OR 0 = BLACK NOTE, ANY NEG NUM = WHITE NOTE.
02800	    FOR P6: 10,-10 'HOMES' TO RIGHT OF UPWARD STEM.
02900		     20,-20 'HOMES' TO LEFT OF DOWNWARD STEM.
03000	 	30,-30(FOR 0,-1) PUTS DOTS IN PROPER PLACE IN COMPLEX CHORDS.
03100	      IF P7 HAS 2 DIGITS THE NOTE IS DOTTED; 2ND DIG. IS NUM OF TAILS.
03150			IF 2ND DIGIT IS 1 AND P6 IS NEG. A WHOLE NOTE PRINTS.
03200		DECIMALS AFTER P5 OR P7 SPACE OUT ACCIDENTAL OR DOT.
03300			.01 IN P7 PUTS SLASH THROUGH TAIL (SAME AS P10).
03400		DECIMALS AFTER P6 ARE ACCENT NUMS (.4-.7,.9 ETC. SEE CODE #6)
03500				UP TO 2 ACCENTS CAN BE PUT IN THIS WAY.
03600	
03700	2 RESTS: 2,POS,STF,HGT,REST(-2=WHOLE, 0=1/4, 1=1/8,ETC),P6) 1=DOTTED
03800	
03900	3 CLEFS AND OTHER THINGS:  
04000		  3, POS, STAFF, P4=HGT CHANGE(TO MAKE SOP. ETC.),P5=CLEF NUM
04100		(CLEF NUMS ARE: TREB=0, BASS=1, ALTO=2, TENOR=3,
04200		4=PF. STAFF BRACKET, 5=HALF, 6=WHOLE, 7=b, 8=#, 9=NAT.
04300		 ADD 100 FOR MINICLEFS.)  (P6-P9 AS IN CODE 11.)
04400	
04500		OTHER THINGS: P5=10 = PPP,  11 = PP,  12 = P,  13 = MP,
04600			14 = MF,  15 = F,  16 = FF,  17 = FFF,
04700			20 = CRESC., 21 = DIM., 22 = SUBITO, 23 = MENO,
04800			24 = ACCEL., 30 = ED, 31=MORDANT
04900		 ---- MORE WILL BE ADDED! ---(FILES CLEF0,CLEF1,CLEF2 ARE FULL)
05000	
05100	4 LINES: 4,POS,LOWEST STF,
05200		(P4) NUM OF STAVES UP FOR BAR LINE - IF ALL HIGHER 
05300			PARAMETERS = 0, OR HGT1 (i.e.VERT. POS1 IF LINE).
05400		   FOR HEAVY BAR LINES ADD 100*THICKNESS TO NUMBER IN P4
05500		   (BAR LINES DON'T AFFECT TOP AND BOT MAXI'S.)
05600		(P5) HGT2,   IF P5=50, A +N IN P7=CRESC., -=DECRESC.
05700				OR, IF P8.NE.0, BOX APPEARS OF SIZE
05800				P8=X (BY HORIZ. NUMS) AND P9=Y (BY NOTE NUMS).
05900		(P6) POS2, 	
06000		(P7) 1=DASHES    IF P5=50 +N IN P7=CRESC., -=DECRESC.
06100				 IF P6=P2, MAKES VERTICAL DASHED LINE.
06200		     -1 GIVES VERTICAL WAVEY LINE..P6 MUST=0 
06300		      P9=WIG.UNIT HGT.,  P8 CAN CHANGE WIGGLE WIDTH, THIS AND NEXT
06400		     -2 GIVES HORIZ.WAVEY LINE(P5 GIVES HGT OF WAVE BY NT NUM)
06500				....P6=RIGHT END POINT OF WIGGLE.
06550			P10=ADDED WIDTH FOR BOTH WIGGLES. (1=1 MORE, ETC.)
06600		(P8) NON-ZERO GIVES HORIZ. BOX SIZE, IF P5=50
06700			IF VERT. DASHES, P8 SETS SIZE.(ALSO AFFECTS WIGGLES.)
06800		(P9) GIVES VERT. BOX SIZE, IF P5=50
06850			AFFECTS VERTICLE WIGGLES ALSO.
06900	
07000	5 NUMBERS:  5, POS, STF, NT NUM, SIZE FACTOR, NUM(SINGLE DIGIT ONLY),P7
07100		P7=0 GIVES THIN LINE NUMS., =1 = BDR40 TYPE FONT WHEN IT PLOTS.
07200	
07300	6 ACCIDS, ACCENTS, ETC.: 6, POS, STF, NOTE NUM, P5, P6=SIZE (0=1)
07400		FOR P5: b=1, #=2, NAT=3, WEDGE ACCENT ∧=4(-4=INV), ACCENT >=5,
07500		FERMATA=6 or 26(-6=INV), STAC. OR DOT=7, REPEAT BAR SIGN=8,
07600			TENUTO OR DASH=9, DNBOW=11, UPBOW=12, HARM,=13, +=14,
07700			THESIS=15, ARSIS=16
07800	   ***** 2 ITEMS MAY BE ENTERED AT ONCE WITH P5. e.g. 47 WILL CREATE
07900		A WEDGE(4) WITH A DOT(7) BELOW IT; 79 MAKES A DOT(7) WITH A
08000		DASH(9) BELOW IT. IF ANY OF THE 2-DIGIT CODES ARE USED, THEY
08100		MUST! COME FIRST.   e.g. 135  MAKES  A  HARMONIC(13) WITH AN
08200		ACCENT(5) BELOW.  ETC.	(513 WILL NOT WORK!)
08300	
08400		 SET P13 TO 1 FOR AUTOMATIC HOMING.
08500		 (SEE HOMING INFO IN EDIT SECTION.)
08600	
08700	7 KEY SIG.: 7,POS,STF,NUM OF #S OR FLATS (+=#, -=b),CLEF NUM.
08800					(P5=0=TREB, =1=BASS, =2=ALTO, =3=TENOR)
08900	
09000	8 SLURS: 8, POS1, STAFF, NT1, NT2, POS2, P7=DIP(NT UNITS + OR -), P8
09100		FOR P8 0=SLUR, 1=BRACKET, 2=LFT 1/2 BRKT, 3=RT 1/2 BRKT,
09200		FOR AUTOMATIC ALIGNMENT OF SLUR WITH NOTES, SET P13=1, THEN
09300		IF P8=-1, END POINTS WILL HOME TO NOTE CENTERS.
09400		IF P8=-2, END POINTS WILL HOME BETWEEN NOTES.
09500		USE P8=-3 TO HOME BETWEEN NOTES WHERE 1ST IS DOTTED.
09600	
09700	9 BEAMS: 9, POS, STF, NT1, NT2, POS2, 
09800			FOR "MINI" BEAMS ADD 100 TO P4 (-100 FOR NEG. NUMS.)
09900		 (P7)  STEM DIR(10=↑ 20=↓), 
10000	 	  --  2ND DIG. IN P7=TOTAL NUM OF BEAMS.
10100		 (P8)  10=LFT,  20=RT.
10200		       -10,-20=UNATTACHED PARTIAL BEAMS
10300			 A 2ND DIGIT=DISPLACEMENT NUMBER.
10400			-- IF P10 HAS 30+, P8 WILL HAVE POS3 AND
10500			-- P9 WILL HAVE POS4.
10600		 (P9)  POS3. (OR POS4 IF P10>30.)
10700		 (P10) = NUM OF BEAMS DISPLACED (NO MORE THAN 9.)
10800		  ADD 10 FOR INNER SHORT PARTIAL →
10900		  ADD 20 FOR INNER SHORT PARTIAL ←
11000		  ADD 30 FOR INNER PARTIAL BETWEEN TWO STEMS.
11100		      P11 CAN RESET HOMING RANGE (OR -1 = NONE.)
11200	
11300	10 FOR STAFF LINES: 10,POS1, HGT(3 TO -3), 2ND POS.,
11400		P5) DISPLACEMENT(BY NOTE NUM),
11500		P6) SIZE FACTOR(DECIMAL)(ALSO SEE '88' BELOW.)
11600	
11700		10, 0, STF NUM  WILL GIVE FULL LENGTH STAFF
11800	
11900	11 LIBRARY ITEMS: 11, POS, STAFF, NOTE NUM, P5)ITEM NUM, 
12000		   P6)HORZ. SZ., P7)VERT. SZ.,   P8,  P9,  P10
12100			P8=-1 FOR FILL ON CRT, =-2 FOR NO FILL ANYWHERE.
12200	
12300		P5 MAY HAVE NUMBERS 0 THROUGH 99.  NUMBERS 0-9 REFER TO
12400		THE "BASIC" DRAW FILE.  (SEE 'DRAW.MAN' FOR PREPERATION
12500		OF 'DRAW' FILES.)  THE "BASIC" FILE SHOULD HAVE A NAME
12600		WITH 4 LETTERS AND THE NUMBER 0 ON THE END.  IF THE "BASIC"
12700		NAME IS 'CHAR0' THEN NUMBERS 10 THROUGH 19 WOULD REFER
12800		TO 'CHAR1'; 20-29 TO 'CHAR2', 30-39 TO 'CHAR3', ETC.
12900	
13000		P9 = CLOCKWISE ROTATION BY DEGREES.
13100		
13200		IF P10 IS SET TO 1 A "BASIC" FILE NAME WILL BE REQUESTED.
13300		THE NAME WILL BE STORED IN P10. ANY TIME P10 IS SET TO 1
13400		THE NAME WILL BE RE-REQUESTED.  ANY TIME P10 IS IGNORED THE
13500		LAST NAME GIVEN WILL BE PUT INTO P10.
13600		THUS SEVERAL ITEMS CAN USE DIFFERENT "BASIC" NAMES.
13700	
13800	12 CIRCLES AND ARCS: 12, POS, STF, NT NUM, 
13900			P5=RADIUS(BY HORIZ. SCALE NUMS)
14000			P6=DEGR.1, P7=DEGR.2; ZEROS GIVE COMPLETE CIRCLE.
14100	
14200	14  "SCORE" INPUT: 14, 0, STAFF   -- SEE SECTION BELOW.
14300	
14400	16 LETTERS, WORDS, ETC.:
14500	   16, POS, STAFF, NOTE NUM, SIZE FACTOR, P6
14600		----- THEN TYPE TEXT ----- 
14700	
14800	0-9, A-Z, and = . - , * ( ) " ; : + CAN BE USED.
14900	
15000	UP TO 12 CHARACTERS CAN BE PACKED IN AN ITEM.
15100	STRINGS OF MORE THAN 12 CHARACTERS WILL BECOME SEVERAL ITEMS FOR
15200	EDITING PURPOSES.  
15300	TO PLACE ITEMS IN RELATION TO ALREADY PRESENT NOTES, SET P6≠0.  
15400	SEPARATE EACH ITEM BY SLASHES.
15500	THE SLASHES WILL NOT BE DRAWN. (A LINE ENDED WITH * WILL PRINT *.)
15600	
15700	WHEN  P6≠0,  NUMBERS WILL APPEAR OVER THE NOTES OF THAT STAFF AND YOU
15800	WILL BE ASKED TO TYPE POSITION NUMBERS FOR EACH ITEM.    IF  P4  (THE
15900	VERTICAL  POSITION)  IS  SET  TO 0 YOU SHOULD TYPE 2 NUMBERS FOR EACH
16000	ITEM.  SEPARATE THE PAIRS OF NUMBERS BY SLASHES.  THE FIRST NUMBER OF
16100	A  PAIR  WILL  BE HORIZANTAL POS., THE SECOND WILL BE VERT. POS.  THE
16200	HORIZANTAL NUMBERS WILL BE IN TERMS OF THE NUMBERS  OVER  THE  NOTES.
16300	THUS  1.5,-3/  WOULD  PUT  ITEM 1 EXACTLY HALF WAY BETWEEN NOTE 1 AND
16400	NOTE 2 AND AT  THE  VERTICAL  POSITION  OF  NOTE  LEVEL  -3.     WITH
16500	1.5,-3/.7,13/  THE FIRST ITEM WOULD BE AS BEFORE AND THE SECOND WOULD
16600	BE AT .7 OF THE DISTANCE FROM THE BEGINNING OF THE LINE AND THE FIRST
16700	NOTE AND AT THE VERTICAL POSITION 13.
16800	
16900	IF  P4 IS ANY NON-ZERO NUMBER (AND P6≠0) ALL ITEMS WILL BE PUT AT THE
17000	LEVEL INDICATED IN P4.  IN  THIS  CASE  TYPE  ONLY  ONE  NUMBER  (FOR
17100	HORIZANTAL  POSITION) PER ITEM.  THIS IS PROBABLY THE BEST WAY TO PUT
17200	IN THE TEXT OF VOCAL LINES.
17300	
17400	CURRENTLY (5/74) THREE TYPE FONTS ARE AVAILABLE.  THE DEFAULT FONT IS
17500	CALLED  'PRIMITIVE'.   ALSO  THERE  IS  'BDR40' AND 'BDI40'(ITALICS).
17600	THESE LAST TWO INCLUDE UPPER AND LOWER CASE.  ****** NOTE THAT IF THE
17700	TYPE  FONTS  ARE  TO  BE  MIXED  THE  FIRST ENTRY MUST INCLUDE A FONT
17800	CONTROL CHARACTER EVEN IF IT IS THE DEFAULT FONT.
17900	
18000		FONT CONTROL CHARACTERS:
18100			# = PRIMITIVE  (52)
18200			$ = UPPER CASE (48)
18300			% = LOWER CASE (49)
18400			& = BDR40 (NON-ITALICS) (50)
18500			@ = BDI40 (ITALICS)  (51)
18600			< = OUTLINE ONLY  (53)
18700			> = FILLED   (54) (WILL NEVER FILL ON CRT HOWEVER.)
18800	
18900		WHEN INITIALLY USING THE TWO 'BD' FONTS THE UPPER-LOWER
19000		CASE CHARACTER MUST APPEAR AS WELL AS THE FONT CHARACTER.
19100		LATER FONT OR CASE CHANGES MAY APPEAR SINGLY.
19200	
19300	EXAMPLES:  TO GET THE FOLLOWING IN NON-ITALICS -
19400	
19500			Clarinet
19600	
19700	TYPE - $&C%LARINET/
19800	
19900		FOR THE NEXT WITH THE 2ND WORD ITALICS, THE 3RD PRIMITIVE-
20000	
20100	TYPE - $&O%BOE/@CRESC./#V.S./
20200	
20300		$&<O%BOE/  WOULD PRINT "Oboe" in non-filled letters.
20400	
20500	MOST OF THESE COMMANDS ARE SEMI-STICKY.  TO BE SAFE THEY SHOULD BE
20600	RESET EACH TIME USED.
20700	
20800	WHEN LETTERS ARE EDITED THEY APPEAR UNDER CODE #16.  
20900	AT  EDIT  TIME  P13=1  WILL  CAUSE  HOMING  TO  A NEARBY NOTE.  NOW A
21000	NEGATIVE SIZE FACTOR (IN P5) WILL INVERT THE TEXT.  IF THE STAFF SIZE
21100	IS  LATER  CHANGED  THE  SPACING CONTINUITY OF STRINGS LONGER THAN 12
21200	LETTERS  WILL  BE  DISTURBED.   TO  CORRECT  THIS  SET  P10=1 FOR THE
21300	MISPLACED  UNIT  OF  TEXT.   IT  WILL  THEN  AUTOMATICALLY RESUME THE
21400	CORRECT POSITION AND RESET P10 TO 0.
21500	
21600	18 METER:  18, POS, STF, TOP NUM, BOTT NUM, HGT, SIZE FACTOR
21700	
21800	19 ADJUST STEMS TO MEET BEAMS: 19, STAFF NUM (99=ALL STAVES)
21900				  (ALSO REMOVES TAILS WHERE NEEDED)
22000	
22100	19 N1 N2 ------ IF 2 NUMBERS FOLLOW 19 THE 1ST  SHOULD  BE  THE  ITEM
22200	NUMBER  OF  A  BEAM AND THE 2ND THE ITEM NUMBER OF A NOTE.  THIS WILL
22300	CAUSE THE BEAM TO HOME TO ANY NOTE ON A DIFFERENT STAFF.
22400		BEFORE  USING THIS, CERTAIN REQUIREMENTS MUST BE MET.  P2 AND
22500	P6 SHOULD BOTH BE SET TO THE HORIZANTAL POSITION OF THE ORIGIN OF THE
22600	BEAM  (I.E.  USUALLY  P2).   P4  AND  P5  SHOULD  BE SET THE VERTICAL
22700	POSITION OF THE ORIGIN (USUALLY P4).  P7  SHOULD  INDICATE  THE  STEM
22800	DIRECTION  OF  THE NOTE AT THE ORIGIN POINT.  P11 IS BEST SET TO 1 TO
22900	INHIBIT  OTHER  HOMING  FEATURES.  IF  THE  BEAM  IS  COMPOSITE, THIS
23000	PROCEDURE MUST BE FOLLOWED FOR EACH BEAM ITEM INVOLVED.
23100		THE NOTE ON THE OTHER STAFF MAY HAVE A STEM OF ANY LENGTH AND
23200	IT MAY BE IN FRONT OF OR BEHIND THE ORIGIN POINT OF THE BEAM.  IT  IS
23300	PROBABLY  BEST TO USE THIS FEATURE ONLY AFTER! THE OTHER '19' FEATURE
23400	HAS BEEN USED.  CHECK STEM LENGTHS AND MEETING POINTS CAREFULLY AFTER
23500	USE.
23600	
23700	
23800	
23900	20 TRILLS: 20, POS1, STF, NOTE NUM, 0, POS2, P7
24000			IF P7=1, NO WAVEY LINE APPEARS.
24100	
24200	24 MAGNIFY AREA:  24,SIZE FACTOR, NEW CENTER X,Y
24300						(USE -512 TO 512 RANGE)
24400	30 TREMOLO:  30, POS, STF, NT NUM, STEM DIR(10↑,20↓), NUM OF BEAMS.
24500			IF P5=11 OR 21 BEAMS WILL BE LEVEL INSTEAD OF TILTED.
24600	
24700	33 PARAMETER CONTENTS:  33  N.  TO SEE EXACT CURRENT CONTENTS
24800			OF PARAMETER NUM. N WHILE IN EDIT MODE.
24900	
25000	88 SIZE FACTOR:  88, FACTOR, STAFF NUM  (USE ONLY ONCE PER STAFF NUM.
25100				AND ONLY WHEN NO STAFF LINES ARE USED.
25200				THIS MUST PRECEDE OTHER INPUT ON STAFF!
25300	
25400	101  SPACING SCALE: 101, STAFF NUM  (101,99 ERASES IT)
25500	
25600	333 N1,N2,N3  PRINTS RN ARRAY FROM ITEM N1 TO ITEM N2. N3=1 FOR LPT.
25700		(USING LPT IS FATAL FOR CURRENT DPY AND MUST BE FOLLOWED BY
25800		<CALL>, F<CR> IN ORDER TO RELEASE THE LPT.)
25900	
     

00100	--------  SECTION II  -----------
00200	
00300	***********  LETTER COMMANDS  ***************
00400	
00500	'G' = GET OLD DATA TO WORK ON.
00600	
00700		IF YOU GET THE MESSAGE "UNPACK IT" USE THE MSSAUX PROGRAM.
00800	
00900	'GM' = GET MORE TO ADD TO CURRENT DISPLAY
01000	
01100	'PXC'  PLOTS MUSIC ON THE CALCOMP PLOTTER.
01200	
01300	        BEFORE PLOTTING, MSS RUNS THROUGH ALL DATA TO RESET 'TOP' AND
01400	  	'BOTTOM' SO THAT THE VERTICAL SPACING BETWEEN SECTIONS WILL BE
01500		CORRECT.
01600	
01700		IF THE PAGE IS IN MORE THAN ONE SECTION ALWAYS START WITH THE
01800	BOTTOM  SECTION FIRST.  YOU WILL BE ASKED FOR FILE NAMES.  WHEN THERE
01900	ARE NO MORE TO BE GIVEN TYPE <CR>.  
02000		IF THE FILE NAMES FORM A SERIES OF 5 LETTER NAMES ENDING WITH
02100	CONSECUTIVE  LETTERS  OF  THE  ALPHABET,  YOU  MAY TYPE THE LAST NAME
02200	FOLLOWED BY THE TOTAL NUMBER OF FILES THAT ARE TO BE PRINTED ON  THAT
02300	SINGLE PAGE.  THE FILES WILL BE FOUND IN THE PROPER SEQUENCE.
02400	FOR EXAMPLE, 'TRC4D 4' WILL PRINT FILES TRC4D THROUGH TRC4A.
02500	A SIZE FACTOR OF 1 CREATES THE CORRECT WIDTH FOR 8 1/2" PAPER.
02600	
02700	'PXGP'  PLOTS MUSIC ON THE XEROX XGP.
02800	
02900		BEFORE USING 'PXGP' TYPE 'CTRL C' AND 'A DSK PTP'.  THIS WILL
03000	CAUSE  THE  PLOTTER COMMANDS TO BE WRITTEN ON THE DSK IN A FILE NAMED
03100	'PLOT.BIN'.  FOLLOW THE GENERAL RULES FOR 'PXC' ABOVE.   HOWEVER  THE
03200	SIZE  FACTOR  CANNOT  EXCEED  1.1  AND  FIT  THE PAPER.  WHEN THE MSS
03300	PROGRAM HAS FINISHED TYPE 'R X'.  FOR X AND Y POSITIONS TYPE <CR> AND
03400	FOR  PAPER  LENGTH TYPE '11'.  BE SURE TO DELETE THE PLOT.BIN FILE AS
03500	IT WILL BE VERY LARGE.
03600	
03700	
03800	---- FOLLOWING ARE OLD PLOT COMMANDS ----
03900	'P' N1, N2, N3, N4, N5, N6 = PLOT DISPLAY
04000		 N1=WIDTH FAC., 
04100		 N2=HEIGHT FAC.
04200	         N3=1, PLOTS ONLY THIN LINES. N3=2, PLOTS ALL BUT THIN LINES.
04300		 N4=1  NO MOVE AT START 
04400		 N5=1  NO MOVE AT END.
04500		 N6= MOVE UP 'N' STAVES AT END.
04600	
04700	'RS' = RESTART.  CLEARS BUFFERS AND SCREEN - NO RECOVERY POSSIBLE!
04800	
04900	
05000	SAVE ALL: TYPE 'SAVE'  ('SD'  SAVES DISPLAY ONLY FOR DPY.F4)
05100	
05200		IF 'SAME' IS GIVEN AS A FILE NAME THE NAME WILL BE 
05300		SAME AS PREVIOUSLY.
05400	
05500	  'SB' = SAVE BIG.  SAVES ALL IMPORTANT BUFFERS. FOR QUICKER READIN.
05600	  'SM' = 'SB' WITH THE SAME NAME AS PREVIOUSLY.
05700	  'SF' = FIXUP AND SAVE - REPAIRS TANGLES IN PROGRAM INTERIOR.
05800	
05900	   TYPE '99' TO BACK UP FROM FILE NAME REQUEST.
     

00100	--------  SECTION III  -----------
00200	
00300	******  VARIOUS WAYS TO GET INTO EDIT MODE  ********
00400	
00500	
00600	   TO MOVE LAST ITEM ENTERED LFT-RT OR UP-DOWN:
00700		'L', 'R', 'U' OR 'D' + NUM OF STEPS TO LFT-RT 
00800			(NOTHING ELSE REQUIRED)
00900	
01000	
01100	'EDIT', POS, STAFF, (CODE NUM) ----- TO USE LIGHT PEN: TYPE 'EDIT' <CR>
01200	
01300	A VERTICAL LINE WILL APPEAR AT  THE  POSITION  GIVEN  AND  ALL  ITEMS
01400	WITHIN  5  SPACES OF THE LINE ON THAT STAFF WILL COME UP FOR EDITING.
01500	TO PASS OVER AN ITEM TYPE <CR>.  SEE BELOW FOR METHOD OF CHANGING THE
01600	VARIOUS PARAMETERS.
01700	
01800	IF THE STAFF NUMBER IS GREATER THAN 4, ITEMS ON  ALL  STAVES  MAY  BE
01900	EDITED.
02000	
02100	IF A CODE NUMBER IS GIVEN, THE ITEM NEAREST THE LINE WITH THAT NUMBER
02200	WILL COME UP.  FOLLOWING, ALL OTHER ITEMS OF THAT NUMBER ON THAT LINE
02300	WILL COME UP.
02400	
02500		  WITH THE LIGHT PEN, MOVE CURSOR TO THE ITEM TO BE
02600		  EDITED.  TYPE <CR> AND ITEMS ON ALL STAVES NEAR THAT POINT
02700		  WILL COME UP FOR EDITING IN ORDER. (USES SAME MODE
02800		  AS ABOVE.)
02900	
03000	S(ET) AND A(LIGN) ---------
03100	
03200	IF YOU TYPE 'S' WHILE IN THE ABOVE  FORM  OF  EDIT  MODE  ('ED')  THE
03300	VERTICAL  LINE  WILL  JUMP  TO THE POSITION OF THE CURRENT ITEM UNDER
03400	CONSIDERATION. TYPE <CR> TO PROCEED TO OTHER ITEMS.   AT  THIS  POINT
03500	TYPING 'A' WILL  AUTOMATICALLY ALIGN THE CURRENT ITEM TO THE POSITION
03600	OF THE ITEM AT 'SET'.  TYPE 'X' TO EXIT FROM ANY EDIT MODE.
03700	
03800	'L'=LIGHT PEN --- THIS MAY BE USED IN ANY FORM OF EDIT MODE.  MOVE
03900			THE CURSOR TO THE LOCATION DESIRED FOR THE ITEM.
04000			<CR> WILL MOVE THE ITEM.  NOTE THAT HORIZANTAL
04100			MOVEMENT IS FREE BUT VERTICAL MOVEMENT IS BY STAFF
04200			NUMBERS.  ALL DETAILS OF VERTICAL MOVEMENT MUST BE
04300			TYPED IN.
04400	
04500	
04600	  'I' N = EDIT ITEM NUMBER N
04700			THIS MAY BE TYPED AT ANY TIME WHILE IN EDIT MODE.
04800			THE ITEM INDICATED WILL NEXT COME UP.
04900	  'ST' STAFF NUM, CODE NUM--EDITS ONLY ITEMS OF THAT CODE NUM ON
05000	           THAT STAFF.   IF CODE=0, THEN ALL ITEMS WILL COME UP.
05100	
05200	
05300	***********  HOW TO CHANGE PARAMETERS  ****************
05400	
05500	
05600	  IN EDIT MODE: 'L','R','U', OR 'D' FOLLOWED BY N, MOVES N SPACES TO
05700	    LEFT, RIGHT, UP OR DOWN.  2 DIRS. MAY BE GIVEN AT ONCE.
05800	
05900			****-- OR --****
06000	
06100	  PN1,N1  PN2,N2  PN3,N3  ETC. (TYPE PAIRS OF NUMS TO CHNG PARAMS)
06200			 <CR> ENDS EDIT AND MOVES TO NEXT ITEM FOR EDIT
06300			 'X' ENDS EDIT, EXITS TO INPUT MODE
06400			 'C'SAVES OLD AND NEW FORMS, I.E. "COPIES" ITEM.
06500			 'C' N  SAVES & MOVES TO ITEM N.
06600			 'DEL'  DELETES ITEM AND MOVES ON TO NEXT
06700	
06800	HOMING	**** SET P13=1 TO HOME IN ON ANY NEARBY NOTE ON SAME STAFF.
06900			(P13 RESETS SELF TO 0)
07000	
07100	
07200	GROUP EDIT COMMANDS - - - - - - - 
07300	
07400	'MOVE' OR 'M' <CR>:  TO MOVE GROUPS OF ITEMS
07500	
07600	 YOU WILL ASKED TO TYPE: STAFF NUM, POS1, POS2, (CODE NUM)
07700	    TO SHRINK OR EXPAND ALL STAVES GIVE A STAFF NUM > 10.
07800	     IF NO CODE NUM IS GIVEN ALL ITEMS IN THE AREA WILL BE MOVED.
07900	
08000	     IF 'L' IS GIVEN AS STAFF NUM, THE AREA TO BE MOVED MUST
08100	     BE INDICATED WITH THE LIGHT PEN.
08200	
08300	          ----- 'ASK' FEATURE ------
08400	        IF 100 IS ADDED TO THE CODE NUM, YOU WILL BE ASKED IF YOU
08500	   WANT TO MOVE EACH ITEM INDIVIDUALLY.  'X' WILL EXIT FROM 'MOVE'.
08600	
08700	     TYPE '99' AT ANY TIME TO BACKUP WHEN IN 'MOVE', 'COPY', ETC.
08800	
08900	
09000	'COPY' OR 'C' <CR>:  TO COPY GROUPS OF ITEMS.
09100	
09200		WORKS SAME AS 'MOVE' BUT ORGINAL IS LEFT BEHIND.
09300	
09400	'DELETE' OR 'DE' <CR>:  TO DELETE GROUPS OF ITEMS.
09500	
09600		SAME STRUCTURE AS 'MOVE'.
09700	
09800		  99 0 0 N  WILL DELETE ALL LINES EXCEPT! LINE 'N'. 
09900		     USE 10 FOR STAFF 0.
10000		******** USE WITH GREAT CARE!! *********
10100	
10200	'ALTER' OR 'A' <CR>:  TO ALTER GROUPS OF ITEMS.
10300	
10400		FIRST PART IS SAME AS 'MOVE'.  AFTER THE AREA HAS BEEN
10500		DESIGNATED YOU WILL BE ASKED TO SPECIFY PARAMETER CHANGES
10600		WITH PAIRS OF NUMBERS -- Pn, Change, Pn, Change, etc.
10700	
10800		IF THE FIRST NUMBER GIVEN IS 12 AND YOU HAVE ALREADY
10900		SPECIFIED CODE NUM 1, ALL NOTE STEMS, BEAMS AND SLURS
11000		IN THE GIVEN AREA WILL BE INVERTED.
11100	'DP' N1, N2, . . . . .: COVERS OR UNCOVERS PARTS OF DISPLAY
11200	
11300	'J'  WILL AUTOMATICALLY JUSTIFY LINES, ALLOWING PROPER SPACES FOR
11400	       FOR MOST ACCIDENTALS, CLEFS, ETC.  A STAFF NUM >5 WILL JUSTIFY
11500	       ALL LINES AS A UNIT.  IF POS2 = 0, IT WILL BE TAKEN AS 200.
11600		****NOTE: WHILE YOU CAN START FROM ANY HORIZANTAL POSITION 
11700		(POS1), THE END POINT MUST BE ≥ THE POSITION OF THE LAST ITEM
11800		ON THE LINE.
     

00100	--------  SECTION IV  ---------
00200	
00300	  'SCORE' ITEMS: NOTES-- 14, 0, STAFF
00400	
00500		144 (INSTEAD OF 14)WILL READ EDIT FILE. SEE BELOW FOR FILE
00600		FORMAT.  THE PROGRAM WILL ASK FOR STAFF NUMBER AND FILE NAME.
00700	
00800	      ---- IF P2 IS NEG. (I.E. '14 -1 2' OR '144 -1'), STAFF 4 WILL
00900		   BE SET UP AUTOMATICALLY BY THE FIRST STAFF ENTERED.
01000		      --- SEE BELOW ABOUT THE USE OF STAFF 4. ---
01100	
01200	****  HOW TO USE "SCORE" ITEMS  ****
01300	
01400		 NOTES ARE TYPED IN ALMOST EXACTLY AS IN THE "SCORE" PROGRAM.
01500	  I.E. S=#, F=b, N=NATURAL (bb AND ## ARE NOT AVAILABLE YET.)
01600	  OCTAVE NUMBERS MUST BE USED.  'P' (FOR PROXIMITY MODE) MAY
01700	  BE USED.  'O' RETURNS TO ORDINARY MODE.
01800	
01900		  TREBLE CLEF IS ASSUMED.  TO ENTER A CLEF, TYPE CLEF NAME 
02000	  FOLLOWED BY A SLASH. (TR/  BA/  AL/  TEN/)   PRECEDED  THE  CLEF
02100	  NAME BY A MINUS SIGN (-BA/) TO HAVE THE AFFECT OF A CLEF WITHOUT
02200	  THE CLEF ACTUALLY APPEARING. (IF NO CLEF IS GIVEN IT WILL ALWAYS
02300	  BE TREBLE CLEF POSITION.)
02400	
02500	USE 'M' (FOR MEASURE) TO ENTER A BAR LINE.  'M2' WILL MAKE A  BAR  GO
02600	UP 2 STAVES; 'M3' WILL GO UP 3 STAVES, ETC.
02700	
02800	  FOR KEY SIGS TYPE 'KNA' WHERE N=NUMBER OF ACCIDENTALS AND
02900			A='S' OR + FOR SHARPS, OR - OR 'F' FOR FLATS.
03000	
03100	  NO MORE THAN 72 CHARACTERS MAY APPEAR
03200	  ON ONE LINE OF INPUT. (BUT MORE THAN ONE LINE MAY BE USED.)
03300	  THE LINE MUST END WITH A SEMICOLON OR, IF NO MORE NOTES ARE
03400	  TO APPEAR, WITH '*'.
03500	
03600		THE MOTIVIC FEATURES OF "SCORE" MAY BE USED (BUT WITH
03700	  NO "NESTING").  MOTIVES ARE SAVED WITH DISPLAY DATA
03800	  AND CAN BE REUSED WHEN WORKING LATER.  
03900	  (NO MORE THAN 200 ITEMS CAN BE SAVED IN ANY  LIST OF MOTIVES.)
04000	
04100	  CHORDS ARE CONSTRUCTED BY USING THE COLON WITH  NOTES.
04200	  THE COLON CAUSES THE NOTE TO OCCUPY THE SAME RHYTHMIC POSITION
04300	  AS THE LAST NOTE TO APPEAR WITHOUT A COLON.  THE STEM DIRECTION IN
04400	  CHORDS WILL BE DETERMINED BY THE ORDER OF APPEARANCE OF THE NOTES.
04500	  IF THE FIRST NOTE IS THE LOWEST, THE STEM GOES UP; IF THE FIRST IS
04600	  THE HIGHEST, THE STEM GOES DOWN.  POSITIONING OF NOTES ON PROPER
04700	  SIDE OF STEM AND (IN MOST CASES) SPACING OF ACCIDENTALS AND DOTS
04800	  IS AUTOMATIC.  GRACE NOTES MAY BE USED -- SEE UNDER RHYTHM BELOW.
04900	
05000	   EX.  M/BASS/ K4F /12 8 /C3/EF/E/ M /D X 3/EN2/GS:/B:/M*
05100	
05200	    A BAR LINE COMES FIRST, THEN BASS CLEF.
05300	    NEXT IS A 4 FLAT KEY SIGNATURE, FOLLOWED BY 12/8 TIME.
05400	    THE 3RD NOTE WILL BE AN 'E' WITH NO ACCIDENTAL.
05500	    A BAR LINE WILL PRECEED THE THREE Ds.
05600	    THE LAST 3 NOTES WILL BE AN E MAJOR CHORD.
05700	    ENDS WITH A BAR LINE.
05800		(In the example above the spaces on either side of the
05900		slashes are optional [to help proof reading].  The other
06000	    	spaces, i.e. in "12 8" and in "D X 3" are required.)
06100	
06200		AFTER THE LAST NOTE HAS BEEN ENTERED THE PROGRAM WILL 
06300	  ASK FOR 'POS1, POS2'.
06400	  THE NOTES WILL BE EVENLY SPACED BETWEEN THE 2 POSITIONS ENTERED.
06500	  (<CR>=0,200)  NEXT YOU WILL BE ASKED TO 'TYPE RHYTHM'.
06600	  '99' WILL BACK UP, '999' WILL ESCAPE FROM "SCORE" MODE.
06700	
06800	   A rhythmic duration must be given for each note, rest or 
06900	   chord previously entered. (Clefs, bar lines, etc. should
07000	   ignored.)
07100	
07200	FOLLOW THE SAME RULES AS IN "SCORE".  THE SINGLE DOTTED DUPLE RHYTHMS
07300	WILL AUTOMATICALLY PUT DOTS ON NOTES.  MORE COMPLEX RHYTHMS  MUST  BE
07400	DOTTED INDIVIDUALLY.  (THEY WILL BE CORRECTLY SPACED.)
07500	
07600	   4 16TH NOTES, A QUARTER, A DOTTED 8TH, 16TH, HALF,
07700	   3 TRIPLETS, AND A WHOLE NOTE FOLLOW:
07800	
07900		16////4/8./16/2/12///1*
08000	
08100		***** NOTE THAT CHORDS WITH WHOLE NOTE RHYTHM WILL APPEAR
08200		      WITH A STEM.  THE STEM IS NEEDED TO INSURE PROPER
08300		      PLACEMENT OF NOTES A SECOND APART.  YOU!! MUST
08400		      REMOVE SUCH STEMS AFTER THE LINE IS COMPLETE!! *****
08500	
08600		**** FOR GRACE NOTES, TYPE RHYTHMIC VALUE OF 88.
08700	
08800	
08900	     NEXT YOU WILL BE ASKED 'ADD BEAMS?'  TYPE 'Y' OR 'N'. TO THIS.
09000	        '99' WILL BACK UP, '999' WILL ERASE INPUT AND 
09100	        LEAVE "SCORE" MODE.
09200	        'G' (FOR GO) WILL OMIT ALL FURTHER PROMPTS IN THIS MODE.
09300	
09310	BEAMS WILL BE ENTERED AUTOMATICALLY  IF  YOU  TYPE  NB*  WHERE  N=THE
09320	NUMBER  OF  EIGHTH  NOTES  TO  BE  BEAMED TOGETHER.  2B* WILL BEAM BY
09330	QUARTERS (I.E. 2 8THS), 3B* GIVES STANDARD BEAMING  FOR  3/8  OR  6/8
09340	TIME.   DECIMAL NUMBERS MAY BE USED FOR N. THUS 1.5B* WOULD BEAM EACH
09350	GROUP OF 3 16THS.
09360	
09370	IF IRREGULAR BEAMS ARE NEEDED, GIVE THE NOTE NUMBERS  FOR  THE  FIRST
09380	AND LAST NOTES UNDER THE BEAMS.  IF THE SECOND NUMBER IS NEGATIVE THE
09390	STEMS FOR THE GROUP WILL GO DOWNWARD.
09700	WHEN COUNTING NOTES, IGNORE RESTS, CLEFS ETC.  CHORDS COUNT AS 
09800	ONE NOTE.
09900	
10000		IF YOU HAVE 4 16TH NOTES (STEMS UP) FOLLOWED BY 2 QUARTERS
10100	 AND  3 8THS (STEMS DOWN) TYPE:
10200	
10300		1,4 / 5, -7 *
10400	
10500	  SOME PARTIAL BEAMS MAY HAVE TO BE ADDED INDIVIDUALLY AS YET.
10600	
10610	      ****** AUTOMATIC BEAMS ****** IN MOST SIMPLE SITUATIONS ALL THE
10620	      BEAMS MAY BE PLACED AUTOMATICALLY BY SIMPLY TYPING "2B*". (OR
10630	      "3B*")   2B* WILL CAUSE ALL LOGICAL BEAM CONNECTIONS TO BE MADE
10640	      IN TERMS OF DUPLE RHYTHM.  USE 3B* FOR TRIPLE RHYTHMS SUCH AS
10650	      3/8, 6/8, 9/8, ETC.  THE BASIC UNIT FOR 2B* IS THE QUARTER NOTE
10660	      AND THE BASIC UNIT FOR 3B* IS THE DOTTED QUARTER.
10670	
10700		THE NEXT REQUEST IS 'ADD MARKS?' TYPE 'Y', 'N',  99  OR  999.
10800	IF 'YES' GIVE NOTE NUMBERS AND MARK NAMES OR NUMBERS AS NEEDED.  WHEN
10900	COUNTING NOTES, IGNORE RESTS, CLEFS ETC.  CHORDS  COUNT  AS  1  NOTE.
11000	THE   NUMBER   FOR  THE  ACCENTS,  ETC.  ARE  4=∧(WEDGE),5=>(ACCENT),
11100	6=FERMATA,   7=DOT,   9=TENUTO(DASH),   11=DOWN   BOW,   12=UP   BOW,
11200	13=HARMONIC, 14=+, ETC.(SEE CODE 6.  UP TO 2 MARKS MAY BE ENTERED FOR
11300	EACH NOTE -- BUT EACH MARK MUST BE ENTERED SEPARATELY  WITH  ITS NOTE
11400	NUMBER.	 THE MARK NUMBERS ARE THE SAME AS THOSE FOR P5 WITH CODE# 6.)
11500	
11600		EXAMPLE:  1,5 / 6,5 / 7,9 / 10,7 / 10,9*
11700		  - OR - 1 ACC/6 ACC/7 TEN/10 STAC/10 TEN*
11800	
11900	
12000	    LASTLY YOU WILL BE ASKED 'ADD SLURS?'  
12100	    TYPE 'Y' OR 'N'. TO THIS.
12200	
12300	IF SLURS ARE ADDED, THE ORDER NUMBERS OF THE NOTES AT  THE  BEGINNING
12400	AND  END OF THE SLUR MUST BE GIVEN.  IF THE SECOND NUMBER IS NEGATIVE
12500	THE 'DIP' WILL BE DOWNWARD AND THE STEMS WILL GO UP.  VICE-VERSA  FOR
12600	A POSITIVE SECOND NUMBER.
12700	
12800		THE AMOUNT OF CURVE WILL DEPEND ON THE CONFIGURATION  OF  THE
12900	NOTES  BETWEEN  THE END POINTS.  IN EXTREME SITUATIONS IT IS PROBABLE
13000	THAT THE RESULT OF THIS AUTOMATIC PROCEDURE WILL HAVE TO BE EDITED.
13100	
13200		A TYPICAL EXAMPLE OF INPUT:   2,-3/ 2,-7/ 8,11*
13300	
13400			THIS WILL PUT SLURS FROM 2ND TO 3RD NOTE, 2ND TO 7TH
13500			AND 8TH TO 11TH.
13600	
13700	TO  SLUR  INTO THE 1ST NOTE, TYPE -1,1/ OR -1, -1/.  TO SLUR OUT FROM
13800	THE LAST NOTE, TYPE N,99* OR N,-99* WHERE N=NUMBER OF LAST NOTE.
13900	
14000		THE 'SLUR' SECTION MAY ALSO BE USED TO INVERT ANY STEMS  FROM
14100	THEIR  NATURAL  DIRECTIONS  OR FROM THE DIRECTIONS TO WHICH THEY HAVE
14200	BEEN TURNED BY THE 'DIP' OF THE ENTERED SLURS.  TO DO THIS SIMPLY ADD
14300	100  TO  THE FIRST NOTE NUMBER OF A PAIR.  IF 2ND NUMBER IS PLUS, THE
14400	STEMS GO UP; IF 2ND NUMBER IS NEGATIVE, STEMS  GO  DOWN.   THIS  WILL
14500	ONLY  INVERT  THE  STEMS  OF  THE NOTES INVOLVED; ANY SLURS INVOLVING
14600	THESE NOTES SHOULD BE ENTERED WITH PAIRS OF NUMBERS PREVIOUS  TO  THE
14700	PAIRS WHICH WILL INVERT THE STEMS.
14800	  ***** NOTE THAT TIES BETWEEN THE INNER NOTES OF TWO CHORDS CANNOT
14900		BE DONE AUTOMATICALLY AS YET.
15000	
15100	
15200	∞∞∞∞∞ FOR 'BEAMS', 'MARKS' AND 'SLURS' A 2ND LINE OF INPUT MAY BE
15300		GIVEN IF THE 1ST LINE ENDS WITH ';' INSTEAD OF '*'.
15400	
15500		ALL ITEMS ENTERED UNDER '14' MAY BE EDITED LATER AS IF THEY
15600	  WERE ENTERED INDIVIDUALLY.
15700	
15800	FOR CODE # 144:  FOLLOWING IS THE FILE FORMAT FOR "SCORE" INPUT FROM
15900	   AN EXTERNALLY EDITED FILE.  THE NAME OF THE FILE CAN HAVE NO MORE
16000	   THAN FIVE LETTERS.
16100	
16200		00100   (NOTES) . . . *
16300		00200   (RHYTHM) . . . *
16400		00300   (BEAMS) . . * A BLANK LINE = NO BEAMS
16500		00400   (ACCENTS) . . *  BLANK LINE = NO MARKS
16600		00500   (SLURS) . . *  BLANK LINE = NO SLURS
16700	
16800		(2ND LINES MAY BE ADDED WITH ALL ITEMS EXCEPT RHYTHM.)
16900	
17000	    THIS SEQUENCE MAY BE REPEATED UP TO 7 TIMES.  THE PROGRAM WILL
17100	    ASK FOR EACH OF THE STAFF NUMBERS.
17200	
17300	
     

00100	---------  SECTION V  -----------
00200	
00300	********* TO SET UP AUTOMATIC IRREGULAR RHYTHMIC SPACING *******
00400			  --- STAFF 4 ---
00500	
00600		ANY  NOTES WHICH APPEAR ON STAFF 4 WILL CAUSE ALL ITEMS LATER
00700	ENTERED WITH '14' OR '144' TO BE  SPACED  ACCORDING  TO  THE  SPACING
00800	GIVEN  ON  STAFF 4.  FOR STAFF 4 DO NOT USE ANY RESTS AND RHYTHMS MAY
00900	NOT BE INDICATED BY HORIZANTAL BEAMS.   SINGLY DOTTED  NOTES  MAY  BE
01000	USED BUT ONLY DUPLE DIVISIONS ARE TO BE USED.
01100		(I.E. NO TRIPLETS OR DOUBLE DOTS, ETC.  NOTE HOWEVER THAT
01200		 ANY! RHYTHMIC UNITS MAY BE USED IF THEY ARE PUT ON STAFF 4
01300		 BY THE AUTOMATIC PROCEDURE WHEREIN YOU TYPE EITHER 14 -1 STFn
01400		 OR 144 -1.  IF STAFF 4 IS BLANK, SETTING P2 NEGATIVE WILL
01500		 CAUSE A DUPLICATE OF THE FIRST LINE YOU ENTER TO APPEAR ON
01600		 STAFF 4.  IT WILL BE SPACED ACCORDING TO THE RHYTHM AND
01700		 WHATEVER ADJUSTMENTS ARE NEEDED FOR CLEFS, ETC.  ALL FURTHER
01800		 LINES ENTERED WILL CONFORM TO THIS SPACING UNLESS STAFF 4 IS
01900		 DELETED.)
02000	
02100	AFTER ALL OTHER NOTES ARE PLACED TO SATISFACTION ERASE ALL OF STAFF 4
02200	BY TYPING '99 0 4'.
02300	
02400	IN GENERAL, IT IS PROBABLY BETTER TO USE MANY SMALL VALUES ON 
02500	STAFF 4.  THIS WAY IT IS EASIER TO MAKE MANY DELICATE ADJUSTMENTS.
02600	
02700	*******   MSSAUX  ********
02800	
02900		THIS IS A PROGRAM TO EXTRACT PARTS  FROM  PREVIOUSLY  CREATED
03000	SCORES OR TO PACK SEVERAL MSS.DAT FILES INTO ONE FOR EASIER STORAGE.
03100		THE PROGRAM WILL ASK "PARTS, PACK OR  UNPACK?"  A  FULL  WORD
03200	MUST  BE  GIVEN  IN  REPLY.  WHEN ASKED FOR OUTPUT FILE NAMES BE SURE
03300	THAT ANY NAME GIVEN IS NOT!! ALREADY IN USE.
03400	
03500	---- PARTS ----
03600	
03700		WHEN  ASKED "TYPE TOP STAFF #", GIVE THE HIGHEST STAFF NUMBER
03800	YOU WANT USED FOR THIS SECTION OF THE PART INVOLVED.  IF YOU TYPE "2"
03900	THE LINES 2, 1, 0, ETC. WILL BE USED UNTIL BUFFER SPACE IS EXHAUSTED.
04000	
04100		WHEN  REPLYING  TO "READ WHICH STAFF #?" THREE NUMBERS MAY BE
04200	TYPED.  THE FIRST WILL BE THE STAFF NUMBER OF  THAT  SECTION  OF  THE
04300	ORIGINAL  SCORE TO BE READ, THE SECOND WILL BE A TRANSPOSITION NUMBER
04400	(BY NOTE STEPS -- NOT! 1/2 STEPS) AND IF THE THIRD NUMBER IS  GREATER
04500	THAN  ZERO  THIS QUESTION WILL NOT BE ASKED AGAIN AS SUCCESSIVE FILES
04600	ARE READ IN.
04700	
04800	THE  MESSAGE  "NO  ROOM  FOR THIS ONE" MEANS THE BUFFER DOES NOT HAVE
04900	ROOM LEFT  FOR  ANOTHER  COMPLETE  LINE.   THIS  LAST  LINE  WILL  BE
05000	COMPLETELY IGNORED.  THEN YOU MUST START ANOTHER FILE.
05100	
05200	TRANSPOSITIONS FOR "Bb" INSTRUMENTS  AND  FOR  "F"  INSTRUMENTS  WILL
05300	AUTOMATICALLY FIX MOST OF THE NEEDED CHANGES IN ACCIDENTALS.  HOWEVER
05400	THERE ARE MANY CASES WHERE WRONG RESULTS MIGHT OCCUR  (SUCH  AS  WITH
05500	NOTES  TIED  OVER  BAR  LINES,  ETC.)  SO  CAREFUL  PROOF  READING IS
05600	ESSENTIAL.
05700	
05800	---- PACK AND UNPACK ----    FOLLOW THE PROMPTS.
     

00100	INDEX TO SUBROUTINES:
00200	
00300	    FILE NAME:
00400		MSS
00500		NOTWRT	NOTWRT
00600			RJBX
00700	
00800		ITMSBX	ITMSUB
00900			BMS
01000			METER
01100			RNOTE
01200			MAKNUM
01300	
01400		PLTSRT	RHORZ
01500			SLUR
01600			JUGGLE
01700			LOOP
01800			PLTSRT
01900			BOX
02000			LINES
02100			RDRAW
02200	
02300		HOMER	HOMER
02400			PLACE
02500			FINDIT
02600			IABS
02700			BLOCK DATA
02710			DRWNT
02800	
02900		MOVER	MOVER
03000			RTLINE
03100			EXTEN
03200			MVBEAM
03300			MVBX
03400	
03500		KSSAV	SAVIT
03600			LISTP
03700			FIXUP
03800			KSIG
03900	
04000		GRED	VLINE
04100			ASKIT
04200			GRED
04300			LPEN
04400			DELETE
04500			DPYNEW
04600			PLTCMD
04700	
04800		NOIR	NOIR
04900			NUMB
05000	
05100		TREST	ALPHA
05200			TAIL
05300			REST
05400			ROFF
05500			UNPACK
05600			BREP
05700			FERMTA
05800			SORT2
05900			NOZERO
06000	
06100		CLEFS	CLEFS
06200			JDRAW
06300			CENTER
06400			LINX
06500	
06600		SCANR	SCANR
06700			NALF
06800			EDIT
06900	
07000		SCX	SCMSS
07100			TYPE
07200	
07300		SETLET	SETLET
07400			SETNUM
07500			ACSHFT
07600	
07700		SCRHYX	RHYTH
07800			SETUP
07900			MARKS
08000			DOTS
08100	
08200		NOTBMZ	NOTES
08300			BMX
08400	
08500		BEAMS	BEAMS
08600			XNOTE
08700	
08800		FILLER	FILLER
08900			HGHT
09000			MISS
09100			HALF
09200	
09300		FILLMS	FILLMS
09400			ROTATE
     

00100	
00200	*****  MSS.CMD  *****  (SMALLEST EDITOR.  NO SCORE OR TEXT ITEMS.)
00300	MSS,MOVER,GRED,NOTWRT,HOMER,ITMSBX,CLEFS,KSSAV
00400	,TREST,NOIR,PLTSRT,SCANR,LOOK,FILLER,FILLMS,MSSIO
00500	,CURSOR.REL[MSS,LCS]
00600	
00700	
00800	*****  MSSDD.CMD ****** (AS ABOVE - FOR DATA-DISK)
00900	MSS,MOVER,GRED,NOTWRT,HOMER,ITMSBX,CLEFS,KSSAV
01000	,TREST,NOIR,PLTSRT,SCANR,LOOK,FILLER,FILLMS,MSSIO
01100	,CURSOR.REL[LCS,MUS],TVRLIB[LCS,MUS]
01200	
01300	
01400	****** DDTMSS  *******
01500	%D MSS,MOVER,GRED,NOTWRT,HOMER,ITMSBX,CLFZ,MSFILL,KSSAV
01600	,SETLET,TREST,NOIR,PLTSRT,SCX,SCANR,LOOK
01700	,NOTBMX,BEAMS,SCRHYX,CURSOR.REL[MUS,LCS]
01800	
01900		
02000	***** PRNTX.DO ******   (PREPARES FILE FOR 'PLOTIT.F4')
02100	LOA MDSK←/DUMP MPRNT,NOTWRT,ITMSBX,FILLER,MSSIO,CLEFS,MSSIO
02200	,PPSRT,TREST,LOOK,PLTCMX,PLTIT↔
02300	
02400	****** PRNT.DO ****** (SMALLEST DIRECT PRINT.  NO EDITING.)
02500	LOA MP←/DUMP MPRNT,MSSIO,NOTWRT,ITMSBX,CLEFS,FILLER,MSSIO
02600	,PPSRT,TREST,LOOK,PLTCMD↔
02700	
02800	
02900	******  DOMSS  ******* (MAIN 'DO' FILE)
03000	LOA MM←/DUMP @DDTMSS[1,LCS]↔
03100	
03200	
03300	
03400	****** DOMS.DO ******(TO GET NECESSARY BASIC DATA READ IN BEFORE DUMP.)
03500	LOA MM←/DUMP @DDTMSS[1,LCS]↔AL Y↔S↔G↔INIT↔βAL↔SA MM↔
03600	
03700	
03800	*****  BIGMSS.CMD ******** NEWEST BIG FORM 6/74
03900	%D MSS,MOVER,GRED,NOTWRT,HOMER,ITMSBX,CLEFS,KSSAV
04000	,SETLET,TREST,NOIR,PLTSRT,SCX,SCANR,LOOK
04100	,NOTBMZ,BEAMS,SCRHYX,FILLMS,FILLER,CURSOR.REL[MSS,LCS]
04200	,MSSIO.REL[MUS,LCS]
04300	
04400	
04500	******   MXX.CMD  ******  (SAME AS ABOVE  - SANS DDT.)
04600	 MSS,MOVER,GRED,NOTWRT,HOMER,ITMSBX,CLEFS,KSSAV,MSSIO
04700	,SETLET,TREST,NOIR,PLTSRT,SCX,SCANR,LOOK,FILLER,FILLMS
04800	,NOTBMZ,BEAMS,SCRHYX,CURSOR.REL[LCS,MUS]